function resetpath(fname)
if nargin < 1
    fname = 'path.mat';
end
if exist(fname, 'file')
    %setPrompt();
    load(fname, 'p__path');
    delete(fname);
    path(p__path);
else
    warning('setpath not called.');    
end

end